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1.0 


BACKGROUND 


LEG, via action document 63-0117-4615-20 , was requested to 
establish a communication link between the GIM data base 
and an. application program by May 19 , 1972. This task has 
been successfully completed. 



The aforementioned document further specified that the link 
would be demonstrated by listing on the printer the GIM 
data so obtained by a program which was not part of GIM. 

2.0 METHOD OF LINKING DATA 

Utilizing the "Extract" verb of GIM (For a more detailed 
description of this verb see Houston Area Test Site (HATS) 
Sample Inventory Data Base - CAD Document #CAD1938 and GIM 
USER'S MANUAL , TRW, Document #3181-C) . This causes the re- 
quested information, in this case the UTM numbers for 
Harris County to be extracted from the GIM base and written 
on to tape. 


When. the GIM extract has completed, a Fortran program is 
then compiled and executed. This program reads the tape 
generated by GIM, formats and prints the extracted data on 
the line printer. Whon an end of file on the extracted 
tape is encountered the job is terminated. 

3.0 REQUIRED PERIPHERAL EQUIPMENT & CONTROL CARDS 

The following is a tabular ization of the required, control 
cards and their use; 



(a) @RUN,/R WALECH4 , 46 99A-Dj2fl8-P. , DMS 

Run card required fo*r initiation of 1108 job.. 

(b) @QUAL DMS 

Qualifier for files discription for GIM files. 

(c) @ASG , AX *GIM 

Tape assignment-required for GIM run. 

(d) @ADD *GIM. RUN 

Required for execution of GIM. 

(e) REQUEST 290000 
Required for GIM run. 

(f) GASSN T1"ASG,T A*TEST 1 

Tape assignment for the GIM extract. 

(g) Extract only each HATSF with country ‘101000’#. 

(h) SIGNOFF 

f\lose GIM System. 

(i) @ REWIND A*TEST. 

FUR/PUR command to rewind data tape to load point. 
Cjl @USE 1. ,A*TEST 

:Use command for linking of internal & external files 

(k) @F0R, IL MAIN 

Fortran processor call 
♦ 

Fortran source statements 
End 
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(l) ! @XQT 

■ Excute program * 

i. . ■ 

i 

i ■ _ 

(m) i @FIN 

Return control to X8 executive 

i 

l 

4.0 INPUT/OUTPUT DESCRIPTION 

The format of the data so retrieved from the GIM system is 
unblocked records of 4 words. 

There are 467 such records (UTM grid numbers) in the HATSF 
file. 

Each record has the following octal format: 

i WDl: 77350000000aa-where 7735 is a GIM code for 

a valid record generation-and aa is an octal count 
of the record length in characters, less this 
control word. 

i 

i 

j ■ WD2 : 000000 00 Obb-where bbb is the record number 

i for this extract one v ■ 

WD3 : 23616 52 7311 1-lst word of data-N15RTD in field 
data code, where 'N* is a GIM generated value, and 
means new data (as opposed to propogated value- 
; which would then be a 'P f )-15RTD is the 1st half of 
the UTM grid number 

WD4 : 716561650503-Da taiword 2-951bb-in field data 
code-where the 9515 is the 2nd half of the UTM 
grid number, and the word is blank padded. 

This data would be reformated by „ the. Fortran application pro- 


gram and written as: 

. RECLEN=4 RECNO=bbb N15RTD9515 

5.0 TIMING 

The; 'Combined GIM extraction-: .process , the compiling, - collect- 
ing, execution, and printing.' of the application program (no 
discreet figures are available) took 1 minute and. 8 seconds. 
There are 467 records on tape, and the Fortran program is 
comprized of 18 symbolic statements. 

6.0 OBSERVATIONS 

Although the application program described herein is relative- 
ly simple, the technique employed, that of extracting informa-, 
tion from the GIM data base, and subsequently storing it on 
an external file, processing it with a "stand alone" program, 
is completely general, thereby establishing a concrete data 
communication link with the GIM data base, and any user pro- 
gram. 

7.0 LISTINGS & DECKS 

A Listing and a Deck will be supplied upon request by contact- 
ing Bill Argo or Jim Allison at 4 88-00 80/X411 


